SuperStrict

Local sizx:Int = 1500
Local sizy:Int = 1000
Local siz:Int = sizx*sizy

'8mb
Local column:Float[] = New Float[siz]
Local row:Float[] = New Float[siz]

Local tim1:Long = MilliSecs()
For Local i:Int=0 Until sizx
For Local j:Int=0 Until sizy
	column[i*sizy+j] = 0
Next
Next

Local tim2:Long = MilliSecs()

For Local i:Int=0 Until sizx
For Local j:Int=0 Until sizy
	row[j*sizx+i] = 0
Next
Next

Local tim3:Long = MilliSecs()

Print "col="+(tim2-tim1)
Print "row="+(tim3-tim2)

